case $CONFIG in
    '') . config.sh ;;
esac
outputfile=dbm1.cf
rm -f $outputfile.$$
echo "Creating $outputfile (with variable substitutions)"
if cat >$outputfile.$$ <<!GROK!THIS!
# RCSid[] = "@(#)$Header: dbm1.SH,v 3.5 88/05/27 06:31:51 pb Rel $"
#
##################################################
##################################################
##############
############## configure for dbm1 (UCL dbmencode) output
##############
##################################################
##################################################

# the directory to search for files in

directory $datadir

# enable tracing
verbose 1

# output format
output dbm1

#	context		subnet
#	name
context	TS29		JANET
context	X29		JANET
context	FTP		JANET
context	MAIL		JANET
context	JTMP		JANET
context	DESC		JANET

# Want the domain gateway tables
domains
!GROK!THIS!
then if cmp $outputfile $outputfile.$$ > /dev/null 2>& 1
	then
		rm -f $outputfile.$$
		echo "	" $outputfile not affected
	elif mv $outputfile.$$ $outputfile
	then
		echo "	" $outputfile updated
	else
		echo "+++	" $outputfile left in $outputfile.$$
	fi
else
	echo "	" Failed to create $outputfile.$$
fi
